home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 46 / Amiga Format CD46 (1999-10-20)(Future Publishing)(GB)[!][issue 1999-12].iso / -in_the_mag- / reader_requests / gmplaygui / gui / getplaydir < prev    next >
Text File  |  1997-04-24  |  359b  |  20 lines

  1.  
  2. failat 21
  3. requestfile >env:ffb pattern (#?.mid|#?.midi|mid.#?|midi.#?) TITLE "Select PlayDir" DRAWERSONLY "$midi"
  4. if not warn
  5.     if ."$midi" not eq .$ffb
  6.         unsetenv gm
  7.         break $gmpid
  8.         unsetenv gmpid
  9.         unsetenv midi
  10.         run >nil: selector Pleasewait
  11.         wait 4
  12.         setenv midi $ffb
  13.         failat 10
  14.         unsetenv ffb
  15.         execute /GMPlayGUI
  16.     endif
  17. endif
  18. unsetenv ffb
  19. failat 10
  20.